
//----------------------------
// FIGURE A5: Staff FE (House)
//----------------------------


clear
use staff_FE_house.dta

macro define member_char1 "majority dwnom1 budget chair subchr seniority maj_leader min_leader power dem membecamelob female afam latino state_leg south_dem"
macro define member_char2 "majority dwnom1 budget chair subchr seniority maj_leader min_leader power"

gen lnles = ln(les +1)

set matsize 10000
eststo clear
eststo: quietly areg lnles $member_char1 i.congress i.icpsr, a(core_person_id) vce(cluster icpsr)
esttab, star(* 0.10 ** 0.05 *** 0.01) drop(*icpsr*) ar2
predict d, d

by core_person_id, sort: gen tt = 1 if _n == 1

hist d if tt == 1, lcol(gs5) fcol(gs12) lpat(solid) lwid(thick) xtitle("Staff FE Estimate") graphregion(color(white)) ylab(0(0.5)2.5, nogrid) 
